(** Common code for compiling objects, including the code for virtual object types
and  *)

open Symbols;;

(** Get the appropriate method name for a given binop *)
val method_from_binop : symbol -> string;;
  
(** Get the actual classname for virtual classes *)
val vclassname_from_type : base_type -> string;;
